﻿Namespace SetupTv.Sections

    Public Class Station
        Friend stationName As String
        Friend location As String
        Friend genre As String
        Friend url1 As String
        Friend url2 As String
        Friend url3 As String
        Friend url4 As String
        Friend url5 As String
        Friend url6 As String
        Friend url7 As String
        Friend url8 As String
        Friend url9 As String
        Friend url10 As String

        Public Sub New()
            Me.stationName = ""
            Me.location = ""
            Me.genre = ""
            Me.url1 = ""
            Me.url2 = ""
            Me.url3 = ""
            Me.url4 = ""
            Me.url5 = ""
            Me.url6 = ""
            Me.url7 = ""
            Me.url8 = ""
            Me.url9 = ""
            Me.url10 = ""
        End Sub

        Public Sub New(stationName As String,
                       location As String,
                       genre As String,
                       url1 As String,
                       Optional ByVal url2 As String = "",
                       Optional ByVal url3 As String = "",
                       Optional ByVal url4 As String = "",
                       Optional ByVal url5 As String = "",
                       Optional ByVal url6 As String = "",
                       Optional ByVal url7 As String = "",
                       Optional ByVal url8 As String = "",
                       Optional ByVal url9 As String = "",
                       Optional ByVal url10 As String = "")
            Me.stationName = stationName
            Me.url1 = url1
            Me.url2 = url2
            Me.url3 = url3
            Me.url4 = url4
            Me.url5 = url5
            Me.url6 = url6
            Me.url7 = url7
            Me.url8 = url8
            Me.url9 = url9
            Me.url10 = url10
        End Sub

    End Class

End Namespace
